library(pracma)
A=matrix(c(1,3,4,-1,-2,-3,-1,-2,-2),nrow=3,byrow=T)
det(A)
